home *** CD-ROM | disk | FTP | other *** search
- ;
- ;This is a sample script file that can be used to determine if BBSEdit is
- ;currently editing a BBS list before allowing a user in Telegard to add to
- ;it. You *MUST* pass the name of the BBS list as a parameter to this script.
- ;The default BBS list is BBSLIST.
- ;
-
- FILEEXIST D:\TG3\DATA\@1@.USE GOTO INUSE
- FILECREATE D:\TG3\DATA\@1@.USE
- FILEPUT "BBS list being edited in Telegard"
- FILECLOSE
- MENU OA D:\TG3\DATA\@1@
- FILEERASE D:\TG3\DATA\@1@.USE
- ENDSCRIPT
-
- :INUSE
- PUTNL "`0CSorry, you can not add to the BBS list at this time!"
-